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This Memo, written in the style and cmivetitioh of A. I. Memo. No. lltjA, 
may be considered an addend Lim thereto. It should prove Co be a welcome 
updating, on the LISP system. 


A1Locator 

I* thfl Time-S haring the allocator aske ' + COEti^7' , 

Instead of 'HEMTG??". The response should, he the number of 
2flD0-word blocks of ae;aory desired,, although the allocator 
■id 11 force this umber to be at least 20, so that MEHTDP Is 
at least 37777, See CORE below. 


CLCttTS SUBk 

(CL&im a) is same as call! ok CliM&TK with a la 
accumulator C. Returns a iton-LISP number. See “Plotter"* 
below. 


cqee %um 

lo. T$ LISP. UOflE a) dll attempt to set toe pros ram's CORE 
allocation to a P^C'D-wctd blocks, but in no ease will It 
raise a re-allocation which leaves less than one block of 
Binary Program spans (Bin. Prog* Bpc. occupies the 
higher addresses of the program). Thus If one needs more 
Bln- Prog. Spc. he say call CQR2 ( thereby eiteniljig the 
program's HErfTOP) and set BPEJiD appropriately. If there is 
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not enough aesory available to Hake an Increased 
allocation., id change Is zaie and EIIL is returned; 
otharifise CGEiE returns a 3 value the cur re at CORE 
allocation. 

Current l/G Device 

LISP ties bookkeeping room, for one input file* opened, by 
UEEA0, and one output fUs, opened by IfWHITE. There Ls in 
internal register herein called current device naae, that 
remembers which auxilliary storage device contatno the 
newly opened file, and this resistor mr be changed by 
optional arguments to USHiAD, WRITE and UK ILL. in open 
read file Ls closed by reading an E-O-F character, and an 
open write fiLe is closed by executing a Ume {q*. t^, 

4 r 

DilSCR LSiraa 

Part of the PLcPac package (see below). If there Is an 
argument, Its vaLue is assumed to be an array lame and 
UEtiC-ii (for describe*} produces a Hat of ten numbers, 
associated with the array? (jtdira ydim Iduk lowy li iy hash 
?d light data) where the Last three auahtrs slue 
information about the vidlsectcr used, the lighting, and 
the lode of the lata, lumbers three through sis are In 
floating point, aai "hash" is irrelevant* idim and ydia 
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Are the i .and y dtaeaeion Is&e PI CAMAY), If there Is bo 
A fsiment. slven, the array described Is the one which the 
host recent caU to READPIC read froaii, The Array stored on 
tape which serves as the lata source for the cell to 
FJ3ADFI0 will la general have a description different from 
that of the array In core* {DSSCK ML) U HIT, w that 
(DSS0.it (JtEAfPIC arr lowx lowy delta}) produces either a 
description or NIL depending on whether or not the read was 
Bttccessfull, (See MADPIC)* 


DSSCftSt L3USH 

Sase a-& DESCJt except that nanfoers three through six are 
converted to fixed point* AS&usins a grid of IfrOQQ hy 
10000, 

FI IIA STil 

(PUSHJ F ?im], as .1 LAP las tract tern, converts the 
fixed-point machine auntsr in 1 into a IJSP fixed-point 
nunher* 

FlltS SY-1 

(FUSjU ? ?US) as a LAP instruction, converts. the 
floating-paint machine number In 1 into a LIS? fixed-polat 
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nuatwr, 

PIXP SUjfi 

A predicate* non-Jill only for S-eipressioas which are 
fised-point numbers* 

iTjOAT SfH 

(PtfSHJ ? FLOAT) as a LAP instruction,, coaTerts tfee 
fixed-point machine number in 1 into a floating-pal at 
machine number* InEXPE's to float a fixed-point LISP 
number, do (PLUS passer 0-0). 

f ’ 

J 

FLOAT? SUm 

A predicate, no&-JJIL only for i-ex previous which are 
floating-point numbers. 

tNPX SllBtt 

Reads the input multiplexor channel specified by ita 
argument. (See MPX). 

I PL SUfcS 

tlpej-s the plotter and iJiSUaiiaes it for plotting 'H.bfi-.laj 
lists.. neturns CiiL U 1 the plotter i& tiuiiy arul T otJiorJl-^e* 
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l m suitu 

Has no arguments. Heads the 340 light pa el scanner and 
retjrns {count * [i . y)) where count la tha number of 
tides the Light pea was sees (since the Last call t q LPEK 
nr since the program's beginning) and * and y are the 
average abaclasa and ordinate valuea of the light pen when 
seen. 

MAX L5QM 

Returns the (numerical) naiinum of any number of arguments 
using -contagious floating arithmetic. Thus {MAX 1 Z 4.0) is 
10*0. 

ySKflaR SUBE 

If [MflCBER i 1) U not Nil then tt return* L' where (EQUAL 
1 (CAE L*)) holds and l r is some tall hf l\ l.e, thera Is 
an r such that 1 is {KCQNC l" l'). 

A13L LS03S 

As above for MAX. hut returns the ainiaua. 
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MPX SJiiti 

C UPS. T) Opens Up the raultipleaor I/O Da vice for subsequent 
D/A and A/D use* (MFX HL) closes It* 

r,EITPLQT SUM 

^oves the plotter paper to a clean section* To be used 
after a call t& PLOTLIST (qiT*)* 

MID SGBii 

Seals tue oew video processor and returns a floating-point 
sum tier (with am information content of ten bite) which Is 
an inverse linear measure of the light Intensity at the 
selected vidisector point* (The manual switch located on 
the video processor should be In the "LIN" position when 
itllD Is used* Use ftTFIX when It Is in the **L0G* position)* 
The two arguments are respectively abscissa and ordinate 
values for the image dissector, and suet be fixed-point* 
Returns -1*0 for the dim or dart cutoff condition* 

HVFIX S'JBfl 

A 9 above for MID, but is essentially a logrithaic measure 
of intensity, scaled between I and 17??. Returns a fired 
point number* (RV?3X and 1TID will differ at moat In the 
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three Least significant tits defending on the state of the 
"Llh-LOC 4 * Switch* See MID). He turn 0 for the din hr 4ark 
cutoff condition* 




Used to set certain programmable conditions for the new 
video processor The areameats are Is order: 


filter - three hits 10 - 7) to designate the 
presence of absence of the color filters over the 
Lens, 

confidence - should be 0,1or 3, Determines 
the speed and accuracy of the video processor, 0 
being the etcwest but most accurate* 

resolution - the number of equally- spaced lines 
over the field of tIbw — maximum of 40000* 
(Actually, the video processor always dissects 
the scene onto a £0000 by £0000 grid* This 
merely profIdee a scale factor for the arguments 
to HUD and HVFIK)* For aany reasons 10C0 to 
1UOOO is an extraordinarily good range for this 
argument* 

dim should be In the range 0 - 17 Inclusive* 
Selects one of sixteen dim cut off levels. See a 
hacker for more elucidation. 

xyz - £ero means the video processor receives its 
input from the new ITT Udlsector (TTC > s &un*aero 
means the signal comes from the old ITT 
vidisector (T?El* 


HXL my be used for any of the above argumente, in vhich 
case the specified condition is not changed* Initially all 
conditions are O except resolution, which is £000* Returns- 
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tie value of the device statue regie ter. 


piCAmr FSGBa 

Declares an linage array far u.se with PlcPac* Its use is 
exactly the sane as the function AREWTi Its arguments are 

r 

respectively: 

the array na** 

aIL ' 

the £ dimension (or number of rows) 
the y dimension (or number of egluans) 

The array elements are accessed as usual - (arrayname n m} 
evaluating to the n.nth entry in the array. 


PlcPac 

la an effort to utilize taped vldisector scenes, several 
functions for perfcruing the necessary I/O have been added 
to Li5?. (Sea PIUKB&T* BMJtflC and WRIT£PIC)* There are 
obvicis advantages for the debugging programmer to haring 
standard, wall-doscribed scenes available, as it were, 
through a siaulated vidiaector* Before using tha routines, 
however* one must become aware of the image conventions of 
PlcPac. Images (or scones) are considered to he 
rectangular sub-portions of a unit square, and hence image 
co-ordinates are floating-point numbers between 0*0 and 


LISP 9 


PLOT wm 


PLOTLIST S m 


1*0. This facilitates the mapping of an image space onto 
various I/O devices. Fleet less to say, some 41 sere tiled 
appro ximatlon to the l sage is what U actually etc rad on 
laps, so that the co-ordinates mentioned in flSADPIC really 
refer to the -nearest, lattice point In the image space 
recorded on tape* Once an array Has been read In, however, 
there Is no further use of Image space co-ordinates eicept 
for the description produced by DESCR* Reference to the 
array Is done as Usual on ordinary LISP arrays. The PicFwl 
system id 11 he maintained hy Larry Kra^auer, Ji&oa 819* 545 
Technology Square* 

i 


{PLOT b). is the same as caLIiog PLOTC with n in accumulator 
C* {See A.*I. Xeao. No. 125) * If n = Q or 200 and the 
plotter is not open after the command has been e muted, 
toes [ill is returned* 

I t! 

If the argument is an array came* the contents of the array 
are plotted as they would he displayed on the MU scope* 
(Sea "lisplay - See also XEmiQT). 
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Plover 

The CALCQMF plotter is available as aa output device for 
LISP, In addition to the PLQTLLST feature and PLOT 
described above, IP causes LISP output to be plotted (in 
character a ode) and tU tarns off this output* Before using 
it as such, it is advisable to execute a sequence of 
no act And s such as (PLOT 31 (PLOT 10 (PLOT £2))) in order to 
sate the results more legible* 


REAL LStfEd 

Heads one S-expra salon froi the current input device (see 
"’Input-Output* and "Current I/O Device*), Talc*a 0 or 1 
arguments. If character Is read and no argument gif eh, 
teletype-Input is re-selected.! otherwise on reading S-O-F a 
non-printing error is caused and the value of the argument 
is returned as the Tains of the most recent ERISET. 

ushers are atoms differentiated as seen by their 
form* Floating point numbers follow exactly the same 
format described in the LISP 1,5 Programmer's Nanuai and 
should not tontain non-decimal digits* 0 F l r *** # S,9,A,£, 

,,, ,2 are used as the first 56 digits, so that I EASE may 

reasonably be any number froa 1 to 36. inclusive* Let a 
and b he soy string of the above digits, There are four 
fores for unsigned fixed point numbers! 
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"a" is interpreted as an integer base IBASI 

"a*" i$ interpreted as an integer base 10. 

"af d" is a^UMSi] exp b) 
a*{£ exp b) 

A fixed point number is thus an unsigned fixed-paint number 
preceeded by an optional %* or”-" sign; but if digits 
higher than 9 appear in the number, the preceding sign U 
obligatoryi (Hence any atci whose first character is "+" 
or is a number, except the single-character atoms "+" 
and themseires). (The remainder of the commente under 
READ, beginning "Typing a runout.,.", In A.I. Memo, ho, 
USA page IB* still apply). 


R2ADPLC FS’JER 

Heads into the array Specified by the first argument (which 
must have been declared by FICA3RAV)* receiving data from 
the device and file selected by the most recent ’JREAD. The 
second and third arguments specify lower-left i- and y- 
CD-ordi nates respectively; the fourth argument is a delta d 
auJh that adjacent eatrlea In the array are filled by 
incrementlag the image co-ordinates by an amount d. (See 
FicFsc for an elucidation of Image space co-ordinates). An 
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alternative form is to specify separate deltas for the i 
a ad. y directions (ftMAPlC array lows levy d} or (READ1C 
array lows lowy dx djr) * The coordinates of the upper-right 
point of the image area read in are sire a by upr - Lowx + 
idia*dx and upy - lowy + ydlm*dy, where x4U and ydlm are 
the i-and-y dlaensions respectively of ''array* 1 * ALL 
argmehts except '"array*' are assumed to be floating,, in 
accord with the PtcPac convention, bowerer fixed-point 
ambers say be used; It will be assinei that they refer to 
a 10000 by 1-&00& grid afld they will bo floated accordingly* 
If a section of the roans a tad input area,, i,e, t the 
rectangle froa [lowi,Low/) to (upx l ,upy r }» is not recorded on 
the input file, then EEADPIG prints an error coaxent and 
returns RILi otherwise It returns tbe naaa "array". 


WKTlJti $U3^ 

Por time-sharing LISP, re taros the number of a icro seconds 
of CPU time used by the curreut Job, ae a fixed-point LISP 
number, accurate to about 50 microseconds* 


jPS? SU2R 


(EPOP) restores the *ost recent batch of special poi 
bindings. This is the ’way an dJiPR calls SPtCSTtt U.v) 
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SPL/iS L$UM 

tSPUSa atom V atom V *„) oaves up the Current values of 
tie atoms atom .*■ atom on the special pdL and for each 
one performs la effect ISETQ atom V). This is the way an 
£XF£ can call SPRCBIHL (a**)* 

SLEEP SUES 

(SLEEP a) causes the program to stop temporarily and taie a 
nap for n thirtieths of a second* 

Sy_ALLWK S’JEP 

Is mo-SIL only If Us arguesnt is a oaall-muber, which Is 

repEta Silted as- a pointer eqiLBl to number + 1. 

TINS SO ML 

Par tlse-sharlng LISP, returns the time Counter from the T$ 
systes* as a fisted point LISP number* Currently* this is 
the number of thirtieths of a second that the system has 
been running. There may soon he a feature to read the date 
and a real time* as accurately as possible. Hole that Id 
T 5- LISP there Is no SERINE* 
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UEUsAD FSUBR 

Talwe uo or three arguments, The first Uo are file 
names, the first of which must fee S if the file has only 
one name. Typing 1ft or evaluating (IOC 1ft} changes LISP's 
input from teletype to the current auai 11 lary storage 
levies and file as specified fey the last UREAS* If UKEA.D 
has a third argument, it updates the Current device paxHO as 
follows* If it is nan-r.umerLc* then it say fey UT1, UT2* 

Uf3 oi 1174 for Dec taps ani DDQ, SCI, HD2, etc* for dlsft* 

If It is numeric then only the last character of the 
current defies is changed.. Initially, UTO is current* thus 
before switching input a UAZAD should fee evaluated with 
third argument* for example* 0T2. See "Current I/O 
Device’*. Returns the current device name. 

imm FSUBR 

Selects an auxilliary storage device and opans at) output 
file on it under the nans .LISP. OUTPUT, if there is no 
argument* the current device is selected. Otherwise the 
currant device is updated in the a»nner described under 
UREAD and thee salacted. Returns current device name. If 
there are no more free files on it* prints the error 
message “TAPS PULL". See "-Current I/O Device." 
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trails mm 

C loses the currant output file a ad changes Ut name to that 
specified by tha two arguments to UFILE, Keturas the 
current device name unless the- file failed* in which case 
it returns Hit 

MILL fSUBH 

Flushes the curreot 1/D device U-v-K In time-sharing 
LISF, this taices sense only if the current device is a 
CECtape - random results nay occur if one tries to flush a 
disc* If there is ha argumeut, the current device is 
updated in the manner described under UBSJU) a ad then 
flushed* Returns the na^e of th* device flushed* 

mi SilM 

Taues two fi-sed-twint arguments* Seturns a f Usd-point 
□umher which is an inverse linear measure of Intensity on 
the old ITT vidisector { Tf 3> at the pot at specified by the 
two arguments* U£ia£ the old video processor which is 
slaved to the 34d scope display. 


FI SLOG 5 r Jbii 
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Uses TIM. naturae a Lo«rik!wiic aeasure of intensity aa a 
fixed-point nnaber between 0 and 400« 


¥ff7l30 sim 

Outputs. to tbe 7SQ. See J. Holloway for aore inf (inflation* 


WJUTJGPK FSlLbLi 

(ifstlfEPlC array) writes out on tbs currently upon output 
device tie entire array specified by tbe argument (In 
binary imae noiej. In general, 'fitITEPIC is preceded by a 
OWiElTE and followed by a DFILE, 


